home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 March / Macworld (1998-03) (Disk 1).dmg / Shareware World / Utilities / Text Processing / Alpha / Tcl / Completions / IgorCompletions.tcl < prev    next >
Encoding:
Text File  |  1997-10-08  |  402 b   |  11 lines  |  [TEXT/ALFA]
  1. set completions(Igor) \
  2.     {completion::electric completion::word}
  3.  
  4. set Igorelectrics(do) " \r\t••\rwhile (••)\r••"
  5. set Igorelectrics(iterate) " (••)\r\t••\rloop\r••"
  6. set Igorelectrics(if)      " (••)\r\t••\rendif••"
  7. set Igorelectrics(else)   "\r\t••"
  8. set Igorelectrics(Function) " ••(••)\r\t••\rEnd\r••"
  9. set Igorelectrics(Proc) " ••(••)\r\t••\rEnd\r••"
  10. set Igorelectrics(Macro) " ••(••)\r\t••\rEnd\r••"
  11.